home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / Font / s / Font11 < prev    next >
Text File  |  1995-08-26  |  490b  |  23 lines
  1. ; Author: Copyright 1993 Shaun Blackmore
  2.  
  3.         GET     ^.h.regdefs
  4.         GET     ^.h.swinos
  5.         GET     ^.h.macros
  6.  
  7. ;os_error *Font_ListFonts(char *name, int *count);
  8.  
  9.         PREAMBLE
  10.         STARTCODE Font_ListFonts
  11. ;
  12.         STMFD   sp!, {r4,lr}
  13.         MOV     r4,r1
  14.         MOV     r3,#-1
  15.         LDR     r2,[r4,#0]
  16.         MOV     r1,r0
  17.         SWI     SWI_Font_ListFonts + XOS_Bit
  18.         STR     r2,[r4,#0]
  19.         MOVVC   r0,#0
  20.         LDMFD   sp!, {r4,pc}^
  21. ;
  22.         END
  23.